home *** CD-ROM | disk | FTP | other *** search
/ NeXT Education Software Sampler 1992 Fall / NeXT Education Software Sampler 1992 Fall.iso / Programming / Source / IP_Graph3D / DrawPoly.psw < prev    next >
Encoding:
Text File  |  1991-08-25  |  407 b   |  35 lines
  1. defineps DrawPoly3 (float x1,y1,x2,y2,x3,y3)
  2.     
  3.     0 setgray
  4.     x1 y1 moveto
  5.     x2 y2 lineto
  6.     x3 y3 lineto
  7.     closepath
  8.     stroke
  9.  
  10. endps
  11.  
  12. defineps FillPoly3 (float x1,y1,x2,y2,x3,y3,gray)
  13.     
  14.     gray setgray
  15.     x1 y1 moveto
  16.     x2 y2 lineto
  17.     x3 y3 lineto
  18.     closepath
  19.     fill
  20.  
  21. endps
  22.  
  23.  
  24. defineps DrawPoly4 (float x1,y1,x2,y2,x3,y3,x4,y4)
  25.     
  26.     0 setgray
  27.     x1 y1 moveto
  28.     x2 y2 lineto
  29.     x3 y3 lineto
  30.     x4 y4 lineto
  31.     closepath
  32.     stroke
  33.  
  34. endps
  35.